home *** CD-ROM | disk | FTP | other *** search
/ Aminet 39 / Aminet 39 (2000)(Schatztruhe)[!][Oct 2000].iso / Aminet / biz / dbase / F1db.lha / F1db / InstallF1db < prev    next >
Text File  |  2000-07-17  |  4KB  |  160 lines
  1. ; Install F1db version 0.15
  2. ;
  3. ; $VER: InstallF1db 0.1.2 (11.07.00)
  4. ; Copyright © 2000 Kamil Nieôcioruk
  5. ;
  6. ;
  7. ; authors of translations and proofreads:
  8. ; Polish and English strings by Kamil Nieôcioruk
  9. ; French strings by Olivier Leroy and Philippe Ferrucci
  10. ; German strings by Dirk Neubauer and Soenke Tesch
  11. ; Slovenian strings by Sebastjan Zupan and Damir Arh
  12.  
  13. ;
  14. ; default English strings
  15.  
  16. (set #witam "\nWelcome to the installation of F1db 0.1\n\nF1db is ©2000 by Kamil Nieôcioruk")
  17. (set #gdzie "Please select a drawer for F1db\n(a new drawer will be created there")
  18. (set #przyklad "Do you want to install the example database?")
  19. (set #koniec "\nInstallation completed!\n\nHave fun using F1db!")
  20. (set guidename "F1db.guide_ENG")
  21. (set catalogname "F1db.catalog_ENG")
  22. (set guide2ren "F1db/F1db.guide_ENG")
  23. (set catalog2ren "F1db/catalog/F1db.catalog_ENG")
  24.  
  25. ;
  26. ; Polish strings
  27.  
  28. (if (= @language "polski")
  29.  (
  30.   (set #witam "\nWitam w instalacji programu F1db 0.1\n\nF1db ©2000 by Kamil Nieôcioruk")
  31.   (set #gdzie "Wybierz katalog, w którym chcesz zainstalowaê F1db\n(zostanie tam utworzony nowy katalog)")
  32.   (set #przyklad "Czy chcesz zainstalowaê przykîadowâ bazë danych?")
  33.   (set #koniec "Instalacja zakoïczona!\n\nÛyczë miîej pracy z F1db!")
  34.   (set guidename "F1db.guide_POL")
  35.   (set catalogname "F1db.catalog_POL")
  36.   (set guide2ren "F1db/F1db.guide_POL")
  37.   (set catalog2ren "F1db/catalog/F1db.catalog_POL")
  38.  )
  39. )
  40.  
  41. ;
  42. ; German strings
  43.  
  44. (if (= @language "deutsch")
  45.  (
  46.   (set #witam "\nWillkommen zur Installation von F1db 0.1!\n\nF1db ist ©2000 von Kamil Nieôcioruk")
  47.   (set #gdzie "Bitte wähle ein Verzeichnis für F1db\n(ein neues Verzeichnis wird dort erzeugt)")
  48.   (set #przyklad "Möchtest du eine Beispieldatenbank installieren?")
  49.   (set #koniec "Installation fertig!\n\nViel Spaß mit F1db!")
  50.   (set guidename "F1db.guide_DEU")
  51.   (set catalogname "F1db.catalog_DEU")
  52.   (set guide2ren "F1db/F1db.guide_DEU")
  53.   (set catalog2ren "F1db/catalog/F1db.catalog_DEU")
  54.  )
  55. )
  56.  
  57. ;
  58. ; French strings
  59.  
  60. (if (= @language "français")
  61.  (
  62.   (set #witam "\nBienvenue à l'installation de F1db 0.1 !\n\nF1db est ©2000 de Kamil Nieôcioruk")
  63.   (set #gdzie "Veuillez sélectionner un tiroir pour F1db\n(un nouveau tiroir y sera créé)")
  64.   (set #przyklad "Voulez-vous installer les exemples de bases de données ?")
  65.   (set #koniec "\nInstallation terminée !\n\nAmusez-vous bien avec F1db !")
  66.   (set guidename "F1db.guide_FRA")
  67.   (set catalogname "F1db.catalog_FRA")
  68.   (set guide2ren "F1db/F1db.guide_FRA")
  69.   (set catalog2ren "F1db/catalog/F1db.catalog_FRA")
  70.  )
  71. )
  72.  
  73. ;
  74. ; Slovenian string
  75.  
  76. (if (= @language "slovensko")
  77.  (
  78.   (set #witam "Dobrodo¹li v namestitvi programa F1db 0.1!\n\nProgram F1db je avtorsko delo (C)2000 Kamila Nieôcioruka")
  79.   (set #gdzie "Izberite prosim predal za program F1db\n(tam bo ustvarjen nov predal)")
  80.   (set #przyklad "Ali ¾elite namestiti vzorèno zbirko podatkov?")
  81.   (set #koniec "Namestitev je konèana!\nU¾ivajte v uporabi programa F1db!")
  82.   (set guidename "F1db.guide_SLO")
  83.   (set catalogname "F1db.catalog_SLO")
  84.   (set guide2ren "F1db/F1db.guide_SLO")
  85.   (set catalog2ren "F1db/catalog/F1db.catalog_SLO")
  86.  )
  87. )
  88.  
  89. ;
  90. ; start of the installation
  91.  
  92. (message #witam)
  93.  
  94. (complete 0)
  95.  
  96. (set DOCELOWY
  97.  (askdir
  98.   (prompt #gdzie)
  99.   (help @askdir-help)
  100.   (default "Ram:")
  101.  )
  102. )
  103.  
  104. (makedir (tackon DOCELOWY "F1db") (infos))
  105. (makedir (tackon DOCELOWY "F1db/catalog"))
  106. (complete 20)
  107.  
  108. (copyfiles
  109.  (source "")
  110.  (dest (tackon DOCELOWY "F1db"))
  111.  (choices
  112.   "ATO.readme"
  113.   "autor.jpg"
  114.   "F1db"
  115.   "F1db.info"
  116.   guidename
  117.   "F1db.guide.info"
  118.   "History"
  119.   "RegForm"
  120.  )
  121. )
  122.  
  123. (complete 60)
  124.  
  125. (rename (tackon DOCELOWY guide2ren) (tackon DOCELOWY "F1db/F1db.guide"))
  126.  
  127. (complete 70)
  128.  
  129. (copyfiles
  130.  (source "catalog/")
  131.  (dest (tackon DOCELOWY "F1db/catalog"))
  132.  (choices
  133.   "F1db.ct"
  134.   catalogname
  135.  )
  136. )
  137.  
  138. (complete 80)
  139.  
  140. (rename
  141.  (tackon DOCELOWY catalog2ren)
  142.  (tackon DOCELOWY "F1db/catalog/F1db.catalog")
  143. )
  144.  
  145. (complete 90)
  146.  
  147. (if
  148.  (= (askbool (prompt #przyklad) (help @askbool-help)) 1)
  149.  (copyfiles
  150.   (source "2000.f1db")
  151.   (dest (tackon DOCELOWY "F1db"))
  152.  )
  153. )
  154.  
  155. (complete 100)
  156.  
  157. (exit #koniec
  158.  (quiet)
  159. )
  160.